home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 2002 November / SGI Freeware 2002 November - Disc 2.iso / dist / fw_glimpse.idb / usr / freeware / src / glimpse-3.0 / mkinstalldirs.z / mkinstalldirs
Text File  |  1997-09-09  |  651b  |  34 lines
  1. #! /bin/sh
  2. # mkinstalldirs --- make directory hierarchy
  3. # Author: Noah Friedman <friedman@prep.ai.mit.edu>
  4. # Created: 1993-05-16
  5. # Last modified: 1994-03-25
  6. # Public domain
  7.  
  8. errstatus=0
  9.  
  10. for file in ${1+"$@"} ; do 
  11.    set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
  12.    shift
  13.  
  14.    pathcomp=
  15.    for d in ${1+"$@"} ; do
  16.      pathcomp="$pathcomp$d"
  17.      case "$pathcomp" in
  18.        -* ) pathcomp=./$pathcomp ;;
  19.      esac
  20.  
  21.      if test ! -d "$pathcomp"; then
  22.         echo "mkdir $pathcomp" 1>&2
  23.         mkdir "$pathcomp" || errstatus=$?
  24.      fi
  25.  
  26.      pathcomp="$pathcomp/"
  27.    done
  28. done
  29.  
  30. exit $errstatus
  31.  
  32. # mkinstalldirs ends here
  33.  
  34.